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v04=000 4 Sep 1984 82:35:09 UETPSY. SREagAYSSsoo MAR; 1 : (1), 
- TITLE TAT sS336 SATS SYSTEM SERVICE TESTS S$DLCEFC (SUCC S.C.) 
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FACILITY: SYSTST (SATS SYSTEM SERVICE TESTS) 
ABSTRACT: 

MODULE CONTAINS SUBR ee S_WHICH, WHEN LINKED 

WITH SUCCOMMON.OBJ, FORM TEST MODULE SATSSSS2 TO TEST SUCCESSFUL 
OPERATION OF OLCEFC SYSTEM SERVICE. THE SERVICE IS INVOKED 
UNDER VARIOUS | CONDITIONS WITH VARYING INPUT PARAMETERS. ONLY 
SUCCESSFUL STATUS CODES ARE EXPECTED IN THIS TES DULE. CORRECT 
PERATION OF Hi Bs ths Rie EACH OF ITS ISSUANCES IS VERIFIED BY 
CHECKING FOR A L STATUS CODE, EXPECTED RETURN ARGUMENTS 
AND EXPECTED FUNCTIONALITY PERFORMED. 


ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE, 
DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA, CREATION DATE: JAN, 1978 
MODIFIED BY: 
VERSION 1.5 : 25-MAY-79 
01 LDJ 10/11/79 Fixed bug caused by DIBSK_LENGTH change ACGO52.RNO mem 
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UCC 16-SEP-1984 00:57:11 VAX/VMS Macro V04- Page 3 
ety fi 80: 2:09 LOETP SY eae SAyeSSoo. MAR: 1 * | 
«PSECT RODATA,RD,NOWRT NO XE ,LONG 
D_NAME:: STRING C.<SATS$S52>  ; TEST MODULE NAME 
: STRING I.<SATSSS52> :_~TEST MODULE NAME DESCRIPTOR 
STRING I,< SSDEF!42W: CONDITIONS:> 
; FAO CTL STRING FOR MSGI IN SUCCOMMON.MAR 
STRING I,< *SSDEF!4ZW: 'AS> 
; FAO CTL STRING FOR MSG3 IN SUCCOMMON.MAR 
STRING 1,<SATSSS52_CRE>’; CREATED PROCESS NAME 
STRING I,<SATSSS52-CLUS> ; SUBJECT CLUSTER NAME 
STRING I,<SYSTSTSRES:SATSUTI0.EXE> ; IMAGE NAME FOR CREATED PROC 
SQUOTA CPULM, : INFINITE CPU 
QUOTA BYTLM.512 + BYTE LIMIT FOR BUFFERED 1/0 
SQUOTA FILLM, : OPEN FILE COUNT LIMIT 
SQUOTA PGFLQUOTA,10 =: PAGING FILE Quo 
$QUOTA PRCLM, + SUBPROCESS QUOTA 
$QUOTA TQELM, : TIMER GUEUE ENTRY QUOTA 
$QUOTA LISTEND : DEFINES END OF LIST 
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¥00°800 DECLA ONS S73 p= 382 be £35; 49 UETPSY.SR {SATS $59. MAR; 1 . (1) | 
»PSECT wot RD,WRT »NOEXE LONG 
900808 PRIVMASK: -BLKQ 1 ; ADDR OF PRIVILEGE MASK (IN 
0 MBX CHAN: -BLKL 1 : N FOR MAILBOX FOR CREA Tep PROCESS 
MBXCHANINFO: ; CHANNEL INFO RETURNED BY GETCH 
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$6 ~LONG DIBS$K_LENGTH 
9 «ADDRESS .+ 
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-BLKB DIBSK_LENGTH 
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se 
0000 MBXUNIT: -BLKL 1 ; SAVE AREA FOR MAILBOX UNIT muees 

100 MBXBUFF : STRING 0,120 ; MAILBOX BUFFER FOR CREATED PROCESS 
000001 101 CLUS_MASK: -BLKL 1 ; CLUSTER MASK; USED TO SET SUBJECT CLUSTER | 
000001 102 CLUS_STATE: me 4 ; STATE OF SUBJECT CLUSTER 
000001 103 EFN_REFCT1: -BLKL 1 ; SAVE AREA FOR EFN WHEN REF CT = 1 
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ets 8? : 2:09 SET hey eae ISAySeSSo. MAR: 1 
.SBTTL CONDITION TABLES 
sere CONDITION TABLES FOR DLCEFC SYSTEM SERVICE *#e0 
COND  1,NOTARG,<CLUSTER'S PERM/TEMP SETTING AT TIME OF DLCE*C>,- 
<TEMPORARY>, = 
<PERMANENT>, = 
LONG 0,1 : TEMPORARY/PERMANENT 
COND 2 .NOTARG, <CLUSTER'S REFERENCE COUNT AT TIME OF DLCEFC>,- 
<ONE (€.F. GROUP )>.- 
-F. GROUP 3)>,- 
<TWO (BOTH E.F. GRCUPS)>,- 
<FOUR (BOTH E.F. GROUPS [N TWO PROCESSES)>, 
COND 3,NULL 
COND 4,NULL 
COND 5, NULL 
.PSECT SATSSS52,RD,WRT,EXE 
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.SBTTL TM_SETUP, TM_CLEANUP 

FUNCTIONAL DESCRIPTION: 
M_SETUP AND TM_CLEANUP ARE CALLED TO PERFOR 

REQUIRED HOUSEKEEBING AT THE BEGINNING AND END, RESPECTIVELY, OF 
TEST MODULE EXECUTION 
CALLING SEQUENCE: 

BSBW TM_SETUP BSBW TM_CLEANUP 
INPUT PARAMETERS: 

NONE 
IMPLICIT INPUTS: 

NONE 
OUTPUT PARAMETERS: 

NONE 
IMPLICIT OUTPUTS: 


TM_SETUP: re Mea INDEX 


RE _ (R2,3,4,5,6) CLEARED; 
PRIVILEGES ACQU 


= 


COMPLETION CODES: 
EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
SIDE EFFECTS: 


SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
(VIA RSB) IF ERROR ENCOUNTERED. 
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TM_SETUP: : 
D4 CLRL R ; INITIALIZE 
D4 CLRL R ; «- CONDITION 
CLRL R4 5 wees 
CLRL R5 3 eecee - INDEX 
CLRL R6 : esese REGISTERS 
SBW MOD_MSG_PRINT : PRINT TEST eas BEGIN 


BSB MSG 
MOVAL ‘TEST aco s SUCC,TMD_ADDR : ASSUME END MSG WILL SHOW SUCCESS 
INSV #SUCTESS7#0,#3,MOD_MSG_ chpe ; ADJUST STATUS CODE FOR SUCCESS 


MODE KRNL : KERNEL MODE TO ACCESS PHD 
MOVL aut ogke PHD,R9 GET PROCESS HEADER ADDRESS 
MOVAL eHSa PRIVWSK (RO) .PRIVRASK GET PRIV MASK ADDRESS 
MODE  FROM,S$ ; BACK TO USER MODE” 

PRIV — ADD, ALL ; GET ALL PRIVILEGES 


00000900" EF 10088998 D 
90000000" BF 
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:11 

984 2:09 CUETPSY.SRCISATSSS 
SSETPRN_S TEST_MOD_NAME_D : SET PROCESS NAME 
SS_CHECR NORMAL CHECK K STATUS CODE RETURNED FROM SETPRN 
SCREMBX_S CHAN SHBXCHAN, LOGNAM= hep 5065! MAILBOX FOR PROCESS 

G=#120, PROMSK=40, BUF Suds 
$S$_CHECK NORMAL CHECK NORMAL COMPLETION 
SGETCHN_S CHAN=MBXC : GET CHAN INFO (UNIT NUMBER) 
PRIBUF CMSXCHANINFO 

$$_CHECK NORMAL ; CHECK NORMAL COMPLETION 
MOUZWL MBXCHANINFO+8+D1B$W _UNIT; MBXUNIT SAVE MAILBOX UNIT NUMBER 
use, + RETURN to MAIN ROUT INE 
SDELMBX_S MBXCHAN : DELETE TERMINATION MAILBOX 
BSBW  “MOD_MSG_PRINT : PRINT TEST MODULE END MSG 
RSB : RETURN TO MAIN ROUT INE 
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- SETUP AND CLEANU 5=-SEP-1984 2:09 CUETPSY.SRCJ Sat SSS52.MAR;1 
-SBTTL CONDITION SUBROUTINES = SETUP AND CLEANUP 
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FUNCTIONAL DESCRIPTION: 
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CONDX AND CONDX CLEANUP ARE SUBROUTINES WHICH one A dee 
BEFORE AND AFTER a VERIFY SOBROUTINE, RESPECTIVELY, WHENEVER 
CONDITION X VALU a IS SELECTED (SEE FUNCTIONAL DESCRIPTION OF SUC COMMON 
ROUTINE IN SUCCOMMON.MAR). ANY SETUP FUNCTION PARTICULAR TO THE 
CONDITION X TABLE IS INCLUDED IN THE CONDX SUBROUTINE AND CLEANED 
UP, IF NECESSARY, IN THE CONDX CLEANUP SUBROUTINE. THIS INCLUDES 
ESPECIALLY, CODE TO DETECT CONFLICTS AMONG CURRENT ENTRIES IN TWO 
OR MORE CONDITION TABLES. IF A CONFLICT IS DETECTED, A NON-ZERO 
VALUE IS STORED INTO CONFLICT, WHICH CAUSES THE tae ROUTINE 
(SUCCOMMON) TO SKIP THE CURRENT ENTRY IN THE CONDITION X TABLE. 


CALLING SEQUENCE: 


oe gol BSBW CONDX_CLEANUP 
WHERE X = 1,2,3,4,5 


INPUT PARAMETERS: 
CONFLICT = 0 
IMPLICIT INPUTS: 


R2,3,4,5,6 CONTAIN rr CONDITION 
FOR COND TABLES 1,2,3,4,5, RESPE 


OUTPUT PARAMETERS: 

CONFLICT SET TO NON-ZERO IF COND TABLE CONFLICT DETECTED. 
IMPLICIT OUTPUTS: 

R2,3.4,5,6 PRESERVED 
COMPLETION CODES: 


ON Le INDEX VALUES 
CTIVELY 


wb—ub~wbubab beiheababababubcbal pabababubababwbabaiwbehbal heibahabhabababah diuhabuhabahbababubabahabubahatabaliadbaaiah tna 
POA o ac o o PAEAAAASAAAAOOOSAOAAOOAAAPAAASOASCAAOCASAAS ON 
PUPS BBS BS BB EE EE WWIWI IIAP PI NININIPININID 2 2 4 FO OS SS DCOOOOOCOCOCO wm 
NOUS WR 0 OO NA UE WIN O OD NAME WIN OS OD NAME WIN O ODO NAUE WN - OVWONOUS Wino 


NONE 
SIDE EFFECTS: 
NONE 
COND1:: 
RSB 3; RETURN TO MAIN ROUTINE 
COND1_ CLEANUP: : 
; RETURN TO MAIN ROUTINE 
COND2:: 
RSB ; RETURN TO MAIN ROUTINE 
COND2_CLEANUP: : 
RSB ; RETURN TO MAIN ROUTINE 


16 
SATSSS52 SATS SYSTEM SERVICE TESTS SDLcere (Succ as at eee AX/VMS Macro ¥08599 Page 9 
VO4 CONDITION SUBROUTINES = SETUP AND CLEANU 5=SEP=1984 04:32:09 CUETPSY.SRCISATSSS52.MAR;1 (1) 
16F 28 COND3: 
05 1¢f 5 RSB ; RETURN TO MAIN POUTINE 
1 4 COND3_CLEANUP: : 
05 017 6 ; RETURN TO MAIN ROUTINE 
17 8 COND4:: 
05 0171 RSB ; RETURN TO MAIN ROUTINE 
17 rt: COND4_CLEANUP: : 
05 017 5 ; RETURN TO MAIN ROUTINE 
17 98 CONDS 
05 017 6 RSB ; RETURN TO MAIN ROUTINE 
Bie rt: CONDS_CLEANUP: : 
05 0174 6 RSB ; RETURN TO MAIN ROUTINE 
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v04-000 F § Breer ies borkacg Fant tey caeacayecseo.man:1 age 
se .SBTTL FORM_CONDS 

: FUNCTIONAL DESCRIPTION: 


FORM CONDS FORMATS AND PRINTS 
THE CURRENT ELEMENT IN EACH OF THE CONDITI 


; CALLING SEQUENCE: 
BSBW FORM_CONDS 

INPUT PARAMETERS: 

NONE 

; IMPLICIT INPUTS: 


~~ 
-—Oo 


INFORMATION ABOUT 
ON TABLES. 


R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
FOR COND TABLES 1,2,3,4,5, RESPECTIVELY. 
FOR X = 1,2,3,4,5 : 
CONOX.T’= TITLE TEXT FOR CONDX TABLE 
CONDX-TAB = ELEMENT TEXT FOR CONDX TABLE 
CONDX_C = CONTEXT OF THE CONDX TABL 
E = DATA ELEMENTS OF THE CONDX TABLE 


OUTPUT PARAMETERS: 
NONE 
IMPLICIT OUTPUTS: 
NONE 
; COMPLETION CODES: 

: NONE 
; SIDE EFFECTS: 
NONE 


: CONDX~ 


NAME WN SO ODNAU EWN OS OO NAME WIN OC OONOAU EW O OONOU SES Wwro— 


FORM_CONDS:: 
SFAO_S MSG1_INP_CTL,FAO_LEN,FAO 


DESC, TESTNUM 
FORMAT CONDITIONS HEADER MSG 


4 MOOODOODOOOOOOO0O0 000 OO OOOH 090900009 SII NNN 


FE69" BSBW  OUTPUT_MSG > 2s. AND PRIN 
14 0 CMPB  —s- #@COND1-C , #NULL : 1S CONDITION 1 NULL ? 


FORM_CONDSX 


MOVAL COND1_T Bes A ; SAVE ADDRESS OF CONDITION 1 TITLE 
MOVL COND1~TABLR2] MSG_B ; SAVE ADDR OF COND 1 CURR TEXT et 
OF 


3 

? 
OOBF 3 “6 YES == SUBROUTINE IS FINISHED 
00000000°EF  00000118"EF oD : 
00000000'EF  00000147'EF42 0D 
00000000'EF 00 9 MOVE #CONDT_C.MSG_CTXT : SAVE CONDITION 1 CONTEXT FOR F 

MOV_VAL COND1_C,CONDT_ECR2].MSG_DATA] ; GIVE COND 1 DATA VALUE T 


So 
i a a a ee ae ed ed ad ed ed ad ad 
AANAWAN ANNA NAAAAA AAW WIAA AAWI WING MONoPononopofronoenyd 


NOU SWIM OOo 
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5042000 FORM_CONDS =SEP-1984 30 35ib UETPSY. Tate MAR; 1 wee Tat 
FE4O' 39 1B : BSBW  WRITE_MSG2 : FORMAT AND WRITE CONDITION 1 MSG 
14 9 1 QO1C CMPB #COND2_C,#NULL : IS COND TTT NULL 
\2 iC 0 BNEQU 7 $ NO == CONT 
0096 «= 31 iC i pa BRW FORM_CONDSX : YES <= SUBROUTINE IS FINISHED 
QOOODD000'EF  OO000016B'EF 0D ies 5 MOVAL COND2_T MSG A ; SAVE ADDRESS OF CONDITION 2 TITLE FOR FAO 
O0000000"EF  00000198'EF43 DO 01D 4 MOVL  COND2-TABLR3],MSG_B ; SAVE ADDR OF COND 2 CURR TEXT ELT FOR FAO 
O00000000'EF 00 90 O1DF 5 MOVB COND2_C,MSG_CTXT~ SAVE CONDITION 2 CONTEXT FOR FAO 
1E6 : MOV_VAL COND2_C,COND2_ECR3],MSG_ BATA] : Gl VE COND 2 DATA VALUE TO FAO 
FEI7" 30 O166 BSBQ WRITE-MSG ; FORM MAT AND WRITE CONDITION MSG 
14 146 91 O1€9 8 CMPB =: #COND3_C, #NULL : IS CONDITION 3 NULL ? 
03 }2 1EC 9 BNEQU § 30$ : NO == CONTINUE 
006d 31 IEE 40 os BRW FORM_CONDSX : YES -=- SUBROUTINE IS FINISHED 
00000000' EF 90000217" ‘EF DE O1F1 4¢ MOVAL COND ; SAVE ADDRESS OF CONDITION 3 TITLE FOR FAO 
00000000' EF _ 9000021 F44 00 oie 4 MOVL COND sTiBeRtd MSG_B ; SAVE ADDR OF COND 3 CURR TEXT ELT FOR FAO 
O000000'EF 14 90 020 344 MOVB #COND3_C TXT” SAVE ONDITION 5 CONTEXT FOR FA 
O20F 345 MOV_VAL co OnD3_C mitt “ECRGI, MSG_ baal GIVE COND 3 DATA VALUE TO FAO 
FDEE' 30 O20F 346 BSB RITE MSG FORMAT AND URITE CONDITION MSG 
a me s iF 47 CMPB WCONDE C, #NULL : 1S CONDITION 4 NULL ? 
47 13 0 1 48 BEQLU FORM, CONDSx ; YES == SUBROU TINE! is FINISHED 
00000000'EF — 00000218'EF DE 17-349 MOVAL COND MSG. ; SAVE ADDRESS OF CONDITION 4 TITLE FOR FAO 
QO000000'EF  O0000218'EFSS DO 0222 350 MOVL ia CTAB R5], MSG_B ; SAVE ADDR OF COND 4 CUR R TEXT ELT FOR FAO 
OOOO0000"EF 14 90 0 A: 51 MOVB  #CON MSG SAVE CONDITION 4 CONTEXT FOR FAO 
0 32 MOV_VAL CONDS a CONDE ECRS), MSG G_baT Al ; GIVE COND 4 DATA VALUE TO FAO 
FoC8' 30 0235 35 BSBO RIT ; FORMAT AND m5 hy CONDITION 4 MSG 
16 14 91 0238 354 CMPB WCONDS C, #NULL ; 1s CONDITION 5 NULL ? 
21. 13 0238 355 BEQLU FORM CON NDSX ; YES == SUBROUTINE IS “FINIS 
QO0000000'EF  00000219°EF DE 0230 336 MOVAL COND NDS T : 
00000000°EF  00000219'EF46 DO 0248 357 MOVL  CONDS ~TABERE MSG_B ; SAVE ADDR OF COND 5 CURR TEXT ELT FOR FAO 
QO000000'EF 14 90 0254 358 MOVB CONDS_C,MSG_CT SAVE CONDITION 5 CONTEXT FOR FA 
0258 359 MOV_VAL COND> “U,CONDS_ECR6],MSG_ BATA GIVE COND 5 DATA VALUE TO FAO 
FDA2' 30 0258 360 WRITE~MSG2 : FORMAT AND WRITE CONDITION § MSG 
025E 61 FORM_CONDSX: 
05 025 362 RSB : RETURN TO CALLER 
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dD 1 
YSTEM SERVICE TESTS $DLCEFC (SUCC 16-SEP-1984 00:57:11 YAX/VMS M 4- 
321 $84 2:33:09 LOETPSY SREDSATSSSSo.MAR:1 — i) 


; REF COUNT 0, NO ASCEFC'S TO BE ISSUED 


BRwW 60$ 3 
30S: 


REF COUNT 1, EVENT FLAG GROUP 2 
SASCEFC_S EFN=EFN_REFCT1, - ; 
AME=CLOS NAME. = 
PERM=CONDT_ELR2] 
SS_CHECK NORMAL 
BRO 55$ 


40$: 


: REF COUNT 1, EVENT FLAG GROUP 3 


VERIFY:: 
IsTB FLAG ; SHOULD CONDITIONS BE PRINTED 7? 
Pa BSBW  FORM_CONDS : YES -- FMT & PRINT ALL CONDS FOR THIS T.C. 
: CREATE A CLUSTER AND GET IT BUILT AT LEAST ONCE, THEN DELETE 
; IT WITH A DACEFC. 
SASCEFC_S EFN=#64, NAME=CLUS_NAME ; CREATE A NEW CLUSTER 
SS_CHECR NORMAL ; CHECK ITS COMPLETION 
MOUZBL #64,R1 ; IDENTIFY EVENT FLAG GROUP TO BUILD_CLUST 
BSBW BUILD_CLUST : BUILD THE SUBJECT CLUSTER 
TSTB = EFLAG t IS AN ERROR BEING PROCESSED ? 
BEQL 108 : NO == CONTINUE 
ae: BRW VERIFYX + YES == RETURN IMMEDIATELY 
SSETEF_S EFN=#95 ; ENSURE CLUSTER HAS AT LEAST ONE FLAG ON 
SS_CHECK WASCLR + FLAG 95 SHOULD HAVE BEEN CLEAR PREVIOUSLY 
SDACEFC S EFN=#64 : NOW GET RID OF TEMPORARY CLUSTER 
SS_CHECR NORMAL t ... CHECK ITS COMPLETION 
: THE FOLLOWING CASE INSTRUCTION AND SUBSEQUENT CODING 
: ISSUES AS MANY ASCEFC'S AS NECESSARY TO ACHIEVE THE 
: SPECIFIED REFERENCE COUNT FOR THIS TEST CASE. 
MOVZBL #64,EFN_REFCT1 : ASSUME EVENT FLAG GROUP 2 
CASEB. R3,#0,#% t ISSU CORRECT AS*EFC'’S PER COND 2 INDEX REG 
15$: : START OF CASE WORD DISPLACEMENTS 
.WORD 20$-15$ + REF COUNT 
"WORD 30$-15$ : REF COUNT 1, EVENT FLAG GROUP 
"WORD 40$-15$ : REF COUNT 1, EVENT FLAG GROUP 
“WORD 50$-15$ : REF COUNT 2 
"WORD 50$-15$ : REF COUNT 4 
a BRW 55$ t BRANCH PAST CASE ROUTINES 


GO ON TO ISSUE SUBJECT DLCEFC 


INCREMENT REF COUNT; EFN SET UP ABOVE 


CHECK FOR NORMAL COMPLETION 
GO BUILD THE CLUSTER JUST CREATED 


SATSSS52 SATS S$ =SEP=1984 00:57:11 VAX/VMS Macro V Page 14 
3042000 VERIFY * ty? 8? 35:hs Ye TPSY. Seed 886589 MARST C1) 
00000114'EF 60 8F 9A O3A0 478 MOVZBL #96,EFN_REFCT1 : EST EFN FOR E.F. GROUP 3 
AB 479 SASCEFC_S EFN=EFN_REFCT1, - : INCREMENT REF COUNT 
A 480 NAME=CLOS_NAME, = 
te iB SS_CHECK yp geheCONDT_ECR2] CHECK FOR NORMAL STATUS CODE 
0100 «31 Fe 4 j BRO 55$ + GO BUILD CLUSTER JUST CREATED 
fa iss — 
0 FS 436 t REF COUNT 2 OR 4, BOTH EVENT FLAG GROUPS IN THIS PROCESS 
0 fe 488 SASCEFC_S EFN=#64, ; INCREMENT REF COUNT 
O3F3 489 NAME=CLUS_NAME 
3F 490 PERM=CONDT. ECRS) 
0411 491 SS_CHECK NORMAL : CHECK FOR NORMAL COMPLETION 
043F 49¢ SASCEFC_S EFN=#96, - : INCREMENT REF COUNT 
043F 49 NAME=CLUS 
O43F 494 PERM=CONDT NERS) 
0438 495 SS CHECK NORMAL : CHECK FOR NORMAL COMPLETION 
04 53 D1 0489 496 MPL : FIFTH COND 2 ELEMENT CREF COUNT 4)? 
67 12 048C 497 BNEQU R 3g" ; NO == REF COUNT IS ORE ASCEFC'S 
048E 498 YES == CREATED PROC ISSUE 2 MORE ASCEFC'S 
048E 499 SCREPRC_S PRCNAM=CREPRN, IMAGE= = 1MAGNAM 
048E 500 MBXUNT=MBXUNIT, QUOTA= =QUOTAL IST 
0400 501 SS_CHECK NORMAL CHECK CREPRC COMPLETION STATUS 
O4EE 208 SHIBER_S : SLEEP UNTIL CREATED PROCESS DOES ASCEFC'S 
O4F 20 55$: 
O4F5 04 ; 
Ouro 205 : END OF CASE ROUTINES 
04F5 507 : AT THIS POINT, AT LEAST ONE ASCEFC HAS BEEN ISSUED; CALL 
Oar > 208 :  BUILD_CLUST’TO GET THE CREATED CLUSTER BUILT. 
SA 00000114°EF DO 04F5 510 MOVL  EFN_REFCT1,R10 : ESTABLISH EFN FOR BUILD_CLUST 
02A1 30 O4FC 511 BSBW BUICD_CLUST : BUILD CLUSTER 
00000000'EF 95 O4FF 318 TSTB = EFLAG : IS AN ERROR BEING PROCESSED ? 
03 13 0505 51 BEQL  60$ : NO == CONT 
0259 31 0507 514 BRW VERIFYX : YES == RETURN IMMEDIATELY 
Bk 31g os 
030A 317 t eeeeee SYSTEM SERVICE CALL WHICH IS THE SUBJECT OF THIS TEST CASE **eeee 
050A 519 SDLCEFC_ S NAME = CLUS_NAME ; CLEAR PERMANENT INDICATOR 
00000000'8F 50 1 0517 520 CMPL "RO, #SS$_NORMAL : CODE RECEIVED = CODE EXPECTED ? 
1 13 oie 521 BEaLu 70$ : YES == CONTINU 
00000000'EF  00000000'8F Dd 05 5 : ROVE #SS$ NORMAL, EXPV : LOAD UP EXPECTED 
00000000'EF 50 00 0528 3 MOVL RECEIVED VALUES. THEN EXIT 
3 é 4 a ERR_EXIT LONG INCORRECT STATUS CODE RETURNED FROM DLCEFC 
581 ; 
581 : > TO VERIFY THE SUBJECT DLCEFC, THE CLUSTER’S REFERENCE COUNT 
581 8: WILL BE DROPPED TO 0 (BY ISSUING DACEFC'S) AND THEN AN 
581 9: ADDITIONAL ASCEFC WILL BE ISSUED TO CREATE A NEW CLUSTER 
0581 0: WHICH WILL BE VERIFIED TO BE ALL O'S. BEFORE EACH DACEFC 
581 1: 1S ISSUED, A READEF OF THE CLUSTER WILL BE DONE TO ENSURE 
581 5 : TWAT THE CLUSTER REMAINS EQUAL TO THE CLUSTER MASK; THIS 
581 3 : GUARANTEES THAT THE REFERENCE COUNT WAS CORRECT AND, IN 
581 4: ACT, THAT THE CLUSTER IS NOT DELETED UNTIL THE COUNT 
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SATSSS52 SATS SYSTEM SERVICE TESTS S$DLCEFC (SUCC Ig- SEP- 1984 0:57:11 VAX/VMS Macro v04-00 Page 15 | 
v04=000 VERIFY -SEP=1984 04:32:09 (CUETPSY.SRCJSATSSS52.MAR; 1 1) 
581 535; GOES TO 0. | 
3 : 5 : 
581 8 t THE FOLLOWING CASE STATEMENT AND SUBSEQUENT CODING 
581 ;  DECREMENTS THE REFERENCE COUNT BY ISSUING THE CORRECT 
581 540: SEQUENCE OF DACEFC'S, BASED ON THE REFERENCE COUNT 
° 41 : FOR THIS TEST CASE. 
04 00 53 BF 0581 2 : CASEB 3, 40,84 ; ISSU CORRECT DACEFC'S PER COND 2 INDEX REG 
05 ; 44 75$: : CASE INSTRUCTION WORD DISPLACEMENTS 
000D' 05 45 WORD 808-755 + REF COUNT 
0010" 587 46 “WORD 08-798 : REF COUNT 1, EVENT FLAG GROUP 
10° 0589 54 "WORD 90$-75$ : REF COUNT 1, EVENT FLAG GROUP 
0028' 0588 548 “WORD 100$-75$ + REF COUNT 2 
0028" 058D 549 “WORD 1908-758 + REF COUNT 4 
00pB S31 O58 50 BRW 130$ : BRANCH PAST CASE ROUTINES 
059 331 80S: 
059 338 : REF COUNT 0, NO DACEFC NECESSARY 
0008 4=631 «20592)~= «555 BRW 130$ : GO ON TO CHECK CLUSTER FOR O'S 
gee aap om 
0599 338 > REF COUNT 1, ISSUE ONE DACEFC 
SA 00000114'EF 00 0595 560° MOVL _ EFN_REFCT1,R10 : SET UP CORRECT EFN FOR READ_DACEFC SUBRTN 
0247 30 059¢ 561 BSBW  REABD_DACEFC ; CHECK THE CLUSTER AND DISASSOCIATE 
00000000" EF 95 O59 26g STB EFLAG Is AN ERROR BEING PROCESSED ? 
0189 31 Q3a7 364 sie BRW VERIFYX : YES <= RETURN IMMEDIATELY 
00cO 31 O5AA 566 ae 130$ > GO ON TO CHECK CLUSTER FOR 0'S 
BAS 36f 08: 
O5AD 269 : REF COUNT 2 OR 4, ISSUE 2 OR 4 DACEFC'S 
04 53 v1 OSAD 571° CMPL se R33, #4 : FIFTH COND 2 ELEMENT (REF COUNT 4) ? 
03 «13 0580 O78 BEQLU 105$ > YES == CONTINUE 
0094 31 0582 373 vhs BRW 110$ : NO -= REF COUNT MUST BE 2 
0585 575 " $WAKE_S PRCNAM=CREPRN : WAKE PROCESS TO GET DACEFC'S ISSUED 
05C4 276 SS_CHECK NORMAL HECK FOR NORMAL STATUS CODE 
O5F2 57 $QTOW_S CHAN=MBXCHAN, FUNC=#108 jfeADve BLK, - 
0542 228 P1=MBXBUFF+8, P2=MBXBU 
618 57 rs ... AND WAIT FOR IT TO SEND MAIL 
0618 380 vo SS_CHECK NORMAL : CHECK FOR NORMAL STATUS CODE | 
SA 40 BF 9A (0649 28¢ "  MOVZBL #64,R10 ; SET UP CORRECT EFN FOR READ DACEFC SUBRIN | 
01F6 30 0640 5 BSBW READ _DACEFC ; CHECK THE CLUSTER AND DISASSOCIATE 
00000000" EF 3 630 4 STB F AG : Is AN ERROR BEING PROCESSED ? 
0108 3} e38 6 ios BRW VERIF YX > YES == RETURN IMMEDIATELY 
SA 60 8F 9A 38 8 " — MOVZBL : SET UP CORRECT EFN FOR READ_DACEFC SUBRIN | 
ade oles 30 O3F 3 BSB READ DACEFC : CHECK THE. CLUSTER J AND ~DUSASSOCI [ATE | 
moones'. 8 Ban aa peor ibs Sp ow Eoutineee one’ | 
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SATSSS52 SATS SYSTEM SERVICE TESTS SDLCEFC (SUCC 16-SEP- 0:57:11 VAX/VMS Macro V04- Page 16. SA’ 
¥042000 VERIFY 828 SEP= 1984 8a: 2:09 (CUETPSY. SREISAYSSSo2 MAR; 1 2 (1) | vo4 
OOF6 31 066A 9 BRW VERIFYX : YES -- RETURN IMMEDIATELY 
BB 1m | 
66D 95 : REFERENCE COUNT SHOULD BE DOWN T9 0 AND CLUSTER DELETED. 
3960 38 : DO ONE MORE ASCEFC AND EXPECT A CLUSTER OF O'S. 
066D 98 * SASCEFC_S EFNS#64, NAME=CLUS_NAME ; RE“ASSOCIATE SAME CLUSTER 
0684 599 SS_CHECR NORMAL CHECK COMPLETION STATUS 
0682 600 SREADEF_S EFN=#64, STATE=CLUS_ STATE; READ CLUSTER 
2— 50 «EB «O06C 601 BLBS  ~RO,140$ : CONTINUE IF NORMAL COMPLETION 
oers 60¢ aie SS_CHECK NORMAL ; USE SS_CHECK TO TERMINATE TEST MODULE 
Q0000110"EF 05 ore $0 ‘ome CLUS_STATE ; IS CLUSTER INITIALIZED TO O'S ? 
65 13 O6FC 605 BEQLU VERIFYX ; YES == THIS TEST CASE COMPLETE 
QOOO0D000'EF D4 O6FE 606 CLRL EXP ; NO -- “LOAD EXPECTED AND ... 
OOOOO000'EF 00000110'"EF DO 0704 607 MOVL CL US STA RECEIVED VALUES, THEN EXIT 
O70F 608 ERR_EXIT CONG: CDEETED AND neastogiaree CLUSTER NOT RE-INIT'D> 
0763 609 VERIFYX: 
05 076 610 RSB ; RETURN TO CALLER 


———— 


1 

SATSSS52 SATS SYSTEM SERVICE TESTS SDLCere (Succ 1 ~SEP=19 4 00:57:11 VAX/VMS Macro V04- Pp 17 | 
y042000 VFY_CLEAN Hitt y 4:32:09 (CUCTPSY.SR RC) iret ee MAR; 1 what (1 | 
| 

| 

} 

| 

| 


-SBTTL VFY_ CLEANUP 
; FUNCTIONAL DESCRIPTION: 


) 


VFY CLEAN EXEC 


UTES S$ SERVICES TO UNDO THE 

EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY_CLEANUP MUST 
ASSUME THAT VERIFY MAY Aor HAVE EXECUTED IN ITS ENTIRETY (IF AN 
ERROR IS FOUND). ALSO, VFY_CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT 
ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS: THIS IS-REQUIRED 
IN THE EVENT THAT VFY_CLEANUP IS CALLED DURING ERROR PROCESSING, 

WHEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN 
POSSIBLY DISCOVERING A SECOND ERROR. 


CALLING SEQUENCE: 
BSBW VFY_CLEANUP 
INPUT PARAMETERS: 


NONE 
IMPLICIT INPUTS: 
R2,3,4,5, : yes cynaent CONDITION ee INDEX VALUES 


cone £0 ‘ean TABLES 1,2,3,4,5, RESPECTIVELY 
Veet E’> ADDRESS OF TABLE OF DATA VALUES FOR CONDX 
TABCE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE 

ARGURENT THE ARGUMENT NAME MAY BE USED AS A SYNONYM 
FOR CONDX_E. 
OUTPUT PARAMETERS: 

NONE 
IMPLICIT OUTPUTS: 

NONE 
COMPLETION CODES: 


EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 


DDPAEPAADA AA AAA AAA AAA AAA AAA AAA AAA AAA AA AAO AO 
Dt el ee ee ee ee al ed tt ee et kt ed el et td ed ed et ee et et et et et St ek ek ek ek 


NNN NNN SNS NNN SSSI SSS SSS SSS SSS SSS SSS 
LDP P_PPXPPPAPPAPDP AP AAPA AAA AAA AAA AAAAAAAASAHOAO OOOO OOOO OC OOOO 
AOA & BBE BEE BWW ononononononofn Ss oe 
=DODWNOUE WN OD ONAU EWN OOO NAU EWN OVDONOAUESWWN OO OONAULS WT 


ee SIDE EFFECTS: 

64 SS CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

¢ (VIA RSB) IF ERROR ENCOUNTERED. 

64 Radian 

764 

764 66 

764 66 

764 664 VFY_CLEANUP:: 

764 665 SDLCEFC S NAME=CLUS_NAME ; CLEAR PERM INDICATOR IF _nasem eee 
771 = 66 SS_CHECR NORMAL ; «+. AN. CHECK COMPLETION 


OOO OOCOOCOCOCOCOCOOCOCOCOCOCOOCOSOOOSOCOCOCCOCOCOCOCOOCCOCOCOOCOCCOOOOOOOOOCOOOOO 


o 
uw 


79F = 66 RSB ; RETURN TO CALLER 
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SATSSS52 SATS SYSTEM SERVICE TESTS spucert (SUCC 16-SEP-1984 00: VMS Macro V Page 18 
V04-000 BUILD. CLUST SUBROUTINE Breer 158d Oo 585.09 LOeTb ey caeseayecsso.mans1 Page Tf 
ZA 669 .SBTTL BUILD _CLUST SUBROUTINE 
oA er : PARAARARALALALALALALALAESALALAELESE SESE LESSEE SESE ESE SE EEE EEE EES 
A 672 ; * 
za 78 ; BUILD_CLUST SUBROUTINE 
7A0 (675: * THIS SUBROUTINE CREATES A 32-BIT CLUSTER MASK BY 
7A 66 ; CONCATENATING THE LOW-ORDER BYT TES OF uEGS R2-RS. 
7A0 677 : IT THEN SETS CLUSTER A EQUAL OTHE MA BY 
OA 678 ;* ISSUING THE PROPER COMBINATION OF 32 SETEF/CLREF! S. 
O70 6 0 : , INPUTS: 
O7A0 6 : ; e R2,R3,R4,R5 = CONDITION TABLE INDEX VALUES 
O7A0 684 : : R10 - ANY EFN IN CLUSTER A 
07A0 686 ; : OUTPUTS: 
07A0 688; * CLUS_MASK = — LONGWORD CONTAINING THE CREATED 
BoA rt ; . CLUSTER MASK 
07A0 691 : SUBJECT CLUSTER = UPDATED TO LOOK LIKE CLUS_MASK. 
3 8 
BoA 635 s . VOLATILE REGISTERS: 
0740 695 i RO, R1, RB, RO 
' 
toe hh : RRR AAAARERAARAEREEEE 
07A0 699 BUILD_CLUST: 
QOOOO10C'EF 55 90 O7A0 700 MOVB  R5,CLUS_MASK ; BUILD 
0000010D'EF 54 90 O7A7 701 MOVB 4, CLUS"MASK+1 : .. CLUSTER 
OOOOO1OE'EF 53 290 7AE 70 MOVB  R3.CLUS =Askeg t teeeee MASK 
QOOOO010F'EF 52 90 0785 103 MOVB  R2,CLUS“MASK+ Fever eons 
o7BC 105 ; THE FOLLOWING CODE SETS SUBJECT CLUSTER EQUAL TO CLUS_MASK 
58 SA 00 O7BC 707° MOVL R10.R8 ; ESTABLISH FIRST EFN (EVENT FLAG NO.) 
594 O7BF 708 “bn CLRL : INIT OFFSET INTO CLUS_MASK 
3A 0000010C'EF 59 €0 cl £10 : BBS Bi: _MASK, 308 : ISSUE. SSETEF IF BIT FOR T THIS FLAG IS SET 
6850 8 0702 71g LBS tos STE 'NORMAL STATUS. PROCESS NEXT EVENT FLAG 
i 13 nos. es” CHECK RNORRAL ; USE SS_ MCHECK TO StERMINATE TEST MODULE 
ve so co Reus FIR ‘SSETEF-SEryane APART LTT Stfeas ert emt eu 
rf F at co eg eee RRORRAL : USE ss MChetK 19 StERMINATE | TEST MODULE 
58 86 83D 8 " INCW Rs : GET NEXT EFN 
FF7C 59 «01S sO 08 F £20 ACBB es #31, #1, R9, 208 : GO DO NEXT EVENT FLAG 
05 0845 721 RSB : RETURN TO CALLER 
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SATSSS52 SATS SYSTEM SERVICE TESTS S$DLCEFC (SUCC 16-SEP-1984 00:57:11 VAX/VMS Macro V04- Page 19 
$042000 READ_DACEFC SUBROUTINE mitt 7 0:3 55b¢ UE TPSY. SRE TSATSSSo> MAR: 1 - ee 
, ] ; .SBTTL READ_DACEFC SUBROUTINE | 
4 f 5 : tARRARAAAAAAAAALASAALALALALELE SESE SESE SESE SEER ESE SESE EEE CECE EOS | 
4 3; @ 
; , § ; READ_DACEFC SUBROUTINE 
m 5 : THIS SUBROUTINE COMPARES THE CLUSTER AGAINST THE MASK 
84 730: * AND THEN DISASSOCIATES THE EVENT FLAG GROUP SPECIFIED 
84 f 1; : BY R10 FROM THE CLUSTER. 
tie f 5 : : INPUTS: 
46 735: * R10 - ANY EFN IN THE EVENT FLAG GROUP 
pace 4 § 3 . TO BE DISASSOCIATED. 
0846 738: * CLUS_MASK = — LONGWORD CONTAINING THE IMAGE 
0846 739: * OF THE SUBJECT CLUSTER. 
0846 740 ; * OUTPUTS: 
0846 741: 
0846 rg : NONE. 
0846 7435; %* 
Ba Rg eee 
0846 os : NORMAL - R38 TO CALLER IF CLUSTER EQUALS 
0846 747: * MASK AND SYSTEM SERVICES 
Obee os ; ft FINISH NORMALLY. 
3 ® 
0846 750: * ERROR - ERR_EXIT MACRO EXECUTED IF ABOVE 
0846 131 ‘=. NORMAL CONDITIONS ARE NOT MET. 
0846 738 ; . VOLATILE REGISTERS, AREAS: 
0846 13 : e RO, R1, RB, RY, CLUS_STATE, EXPV, RECV 
Bare oot : tARRRBAAAAAAALALASALALESEELERESERESSEE REE E SESE SESE EERE RRC RRA E ES 
0846 759 READ_DACEFC: 
0846 760 SREADEF_S EFN=R10, STATE=CLUS_STATE ; READ CLUSTER 
2— 50 €8 0855 761 L R : CONTINUE IF NORMAL COMPLETION 
0858 £6¢ ii $S_CHECK NORMAL ; USE SS_CHECK TO TERMINATE TEST MODULE 
0000010C"EF 00000110°EF 1 aBbe 764 ; CMPL CLUS_STATE,CLUS_MASK ; DOES CLUSTER STILL = MASK ? 
00000000°EF o000010C'¢F bd 633 he Seut  ELUS_ MASK, EXPV | NO <> LOADCENPECTED AND ws Ow 
00000000 ' EF adh O'EF 8 8 3 es MOVL — CLUS “STATE,RECV : ... RECEIVED VALUES, THEN EXIT 
OBA 768 ae ERR_EXIT LONG,<CLUSTER STATE NOT MAINTAINED ACROSS DLCEFC OR DACEFC> 
0302 16 ; SDACEFC_S EFN=R10 ; DISASSOCIATE (DECR REF CT BY 1) 
9 : 771 SS$_CHECR NORMAL > CHECK FOR NORMAL COMPLETION 
09 17 READ_DACEFCX: 
05 09 9 77 RSB : RETURN TO CALLER 
93a 774 END 


] 
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SATSSS52 SATS SYSTEM SERVICE TESTS $DLCEFC (SUCC i 94 9: $5:hh 711 VAX/VMS Macro v0e5 89 | 
Symbol table “SEP-19 4:32:09 CUETPSY.SRCJSATSSS52.MAR; 1 
$$ = 00 DIBSW_UNIT = 0000000C 
SSSCHARS = EFLAG eeeeeree 4 
SSSCHARS1 = EFN_REFCT1 00000114 3 
SSSCHARS = ; EXPV eeeeeeee =X 4 
SSSCHARS = 0000001 FAO_DESC eteneere 4 
SSSCHARSS = $ 38 FAO_LEN aeeeeeee =X 4 
SSSCHARSS = FORA_CO 0000175 RG 04 
SSCOND_A = Bhd 004 FORM CONDSX QOO025E R 04 
SSSSTRINGS = 0000 8 1 IMAGNAM 000097A R 02 
SSSSTRINGS2 = 00000005 10$_READVBLK aeeneeee =X 04 
$$T1 = 00000000 LONG = 00000004 G 
$$T2 = BORO SEG MBXBUFF tt 4 R 93 
BUILD_CLUST 000007A0 R 04 MBX CHAN 000008 R 3 
BYTE = 00000001 6G oes QO00000C R 03 
CFLAG eeeenere =X 804 MBXUNIT 00000088 R 3 
CHMRTN teerenee =X = 04 MOD _MSG_CODE aeeeenee =X 4 
CHM_CONT teeereee =X 04 MOD _MSG_PRINT eenteeee =X 4 
CLUS MASK 0000010C R 03 MSGT_INP_CTL 00000019 R 8 
CLUS_NAME 00000065 R BS MSG3-ERR_CTL 00000039 RG 
CLUS- STATE 00000110 R 0 MSG_A eeeneeee =X = 04 
COMP SC eekkeene x 04 MSG_B eekkkene x 04 
00000168 RG 04 MSG_CTXT eeeeeeee =X 04 
COND1_C = 00000000 NOTARG = 00000000 G 
COND1_ CLEANUP 44 44 9b 4 RG 04 NULL = 00000014 G 
COND1_ 00000163 R 03 OUTPUT_MSG aeeaenee =X 04 
COND1_H 00000146 RG 03 PCV eeeneere =X 04 
COND1_ 00000118 R 03 PHD$Q_PRIVMSK = 00000000 
COND1_TAB 00000147 R 03 POL$_BYTLM = 00000003 
COND2 0000016D RG 04 PQL$_CPULM = 00000004 
COND2_C ~ BebnoS oe PQL$_FILLM = 00000006 
COND2_ CLEANUP 0000 106 RG 04 PQL$_LISTEND = 00000000 
COND2_E 00000217 R 03 PQL$_PGFLQUOTA = 00000007 
COND2_H 00000197 RG 03 PQL$_PRCL = 00000008 
COND2_T 0000016B R 03 PQL$_ TQELM = 00000009 
COND2_TAB 00000198 R 03 adh ASK 444446444 R 03 
COND 4:9 RG 04 PRIV_ARGS = 00000002 
COND 3 = 00900014 PROCESS TERR eeeeeeee =X 04 
COND3_ CLEANUP 00 Beo49 RG 04 QUAD = Ha 44 G 
COND3_ 00000217 RG 03 ayy Ht) 0000099 02 
COND3_T 00000217 R 03 READ_DACEFC 00000846 R 04 
COND5_TAB 5444 17 R 03 READ_DACEF CX 00000939 R 04 
COND4 0000171 RG 04 RECV eeenenee = =X 04 
COND4_C = 00000014 REST_REGS aeeneeee =X 8604 
COND4 _CLEANUP 4 ad RG % SAVE-REGS eeeeeeee =X 4 
COND4 _H 18 RG 3 SS$_RORMAL eteeeree =X 4 
COND4_T 00000218 R 03 SS$_WASCLR eeeeeeee =X 4 
COND4_TAB 00000218 R bz SUCCESS etreeeee =X 4 
CONDS 0000173 RG 4 av sensceee eeeeeeee GX 4 
COND5_C = 00000014 SYSSCLREF aeeneeee GX 04 
COND) CLEANUP 38 174 RG 04 SYSSCRKRNL eereeene GX 4 
5_H 19 RG 03 SYSSCREMBX eeeeeree GX 4 
, 38 19 R H SYSSCREPRC tereeene GX 4 
COND5 TAB 000219 R SYSSDACEFC eeeeeree GX 4 
REPRA 0000051 R be SYSSDELMBX eeneneee GX 4 | 
CTL$GL_PHD eereeere = § X 4 SYSSDLCEFC eteneree GX 4 
| ee = 4's td G SYSSFA eeeeeeee =X 4 
DIBSK_LENGTH = 00000074 SYSSGETCHN eeeeeeee GX 4 


1 
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Symbol table ioe 90: 35509 YOETPsY.s JSA 
SYSSHIBER eeeneree GX 4 
YS$Q10W eeneerer GX 4 
SYSSREADEF eeeereee GX 4 
SYSSSETEF eeeerene 6X 4 
SYSSSETPRN teeeenee GX 4 
SYSSSETPRV teneeeee GX 4 
SYSSWAKE teeenene GX 4 
TEST eheeeeee x 4 
TEST_MOD_ 00 RG 
TEST_MOD_NAME_D atdaitds R 3 
TEST_MOD_ SUCC eeeeeeee 86 
TMD ADOR™ eereneer 4 
TM_CLEANUP 000 159 4 
TM_ SETUP 0 0 RG 4 
VERIFY OO0O025F R 4 
ERIF YX 00000763 R 4 
VF Y_ CLEANUP 00000764 R 4 
RO 00000002 
WRITE_MSG2 eerereee 04 
mec meres en ane ane + 
! Psect synopsis ! 
feemaseocn cone eeeet 
PSECT name Allocation PSECT No. Attributes 
" 00000000 < 0.) 00 ¢ OO.) NOPIC uSR CO ABS LCL NOSHR NOEXE NORD 
SABSS 00000000 8°} 01 ¢ 1.) \NOPIC USR CON ABS LCL NOSHR EXE RD 
RODATA 00000dBC (¢ ig .) 8 ( ¢°} NOPIC USR CON REL LCL NOSHR NOEXE RD 
RWDATA QOOO02Z1A ; 8.) 03 ¢ -) NOPIC USR CON REL LCL NOSHR NOEXE RD 
ATSSS A ) -) NOPIC USR~ CO REL LCL NOSHR EXE RD 
SATSSS52 QOO00093A ( 2362 04¢( & 
ee ee me ewe re Re eee ewe + 
: Performance indicators H 
ase age faults me apse me 
Ph P faul CPU Ti El d Ti 
Initialization 35 0:00:00.07 8 :00:00.31 
Command processing 140 B38 : 8 0:00:02.93 
Pass 29 0:00:16.59 
Symbol table sort 8 0:00: a-9 
Pass 2 15 0:00:02. :00:03.1 
Symbol table output 1 :00: 49 :00: Bf 
Psect synopsis output :00:00.0 :00:00.0 
Cross-reference output :00: 98 BR: : 9-9 
Assembler run totals 64 0:00:12. :00:25.76 


Ihe working set Limit was 1650 pages. d 
30 bytes (935 pages) of virtual memory were used to buffer_the intermediate 


de. 
here were 30 pages of symbol table space allocated to hold 357 non-local and 80 local symbols. 


74 source Lines were read in Pass 1, producing ¢8 object records in Pass 2. 
0 pages of virtual memory were used to define 40 macros. 


04- P 1 | 
Oes85.man:1 28 a) 
| 


NOWRT NOVEC BYTE 
WRT NOVEC BYTE 
NOWRT NOVEC LONG 
WRT NOVEC LONG 
WRT NOVEC BYTE 


| 8 eee eee ee 


4 1 
SATSSS52 SATS SYSTEM SERVICE TESTS S$DLCEFC (SuUCC 197 5EO- 1386 ie ya tyae M 
VAX=11 Macro Run Statistics EP-19 :32:09 CUETPSY.S 


tere ern wmocnocee OO em Ht 


! Macro Library statistics ! 


te ee nee seem nemo newer oer oem me $y 


Macro Library name Macros defined 


coun :FSHRL 1B} ETP.MLB;1 9 
LIB.MLB;1 1 

spuA Pevec ie STARLET ALB: 2 ¢f 
=32588 (all libraries) 7 


775 GETS were required to define 37 macro:. 


ae 


There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:SATSSS52/0BJ=OBJ$:SATSSS52 MSRC$:SATSSS52/UPDATE=(ENHS: SATSSS52) +EXECML$/LIB+SHRLIB$:UETP/LIB 


SSATSSS52.MAR; 1 
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